home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 21 / AMIGAplus Sonderheft 21 (1999)(ICP)(DE)[!].iso / Multimedia / Sounds / Instrumente / PLAY < prev    next >
Text File  |  1999-08-18  |  676b  |  28 lines
  1.  
  2. ; **** Future © Player - WAVE-Playskript von Cord Hagen ****
  3. ; ****** PLAY16 muß sich im C-Verzeichnis befinden *********
  4.  
  5. ASSIGN FPTARGET: ""
  6. CD FPTARGET:
  7. SETENV CDDIR=FPTARGET:
  8. SETENV CDMP3=#?.wav
  9. LAB CHOICE1
  10. REQUESTFILE DRAWERSONLY NOICONS TITLE "Future © Player - Wähle Verzeichnis ...." > ENV:CDDIR
  11. CD $CDDIR
  12. LAB CHOICE2
  13. REQUESTFILE TITLE "Future © Player - Wähle WAVE-Datei ...." > ENV:CDMP3
  14. PLAY16 $CDMP3 >NIL:
  15. SETENV MP3=#?
  16. REQUESTCHOICE >ENV:MP3 "Future © Player""Möchten Sie eine weitere WAVE-Datei abspielen ?" Ja Nein
  17. IF $MP3 EQ 0
  18.  SKIP ENDE
  19. ENDIF
  20. IF $MP3 EQ 1
  21.  SKIP CHOICE2 BACK
  22. ENDIF
  23. LAB ENDE
  24. RUN >NIL: DELETE ENV:MP3
  25.  
  26. ; "Only AMIGA make it possible ...." ;-)
  27.  
  28.